-- card: 5497 from stack: in
-- bmap block id: 0
-- flags: 0000
-- background id: 5187
-- name: print TN/odd


-- part 1 (field)
-- low flags: 00
-- high flags: 0002
-- rect: left=0 top=0 right=23 bottom=512
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 256
-- line height: 16
-- part name: Title to Print
----- HyperTalk script -----
on mouseUp
  global listSelected, lineClicked
  put clickLine() into lineClicked
  -- determine how many lines are hidden above
  put (the scroll of me / textHeight of me) into linesAbove
  -- add that number to the relative position clicked
  add linesAbove to lineClicked
  -- userLevel must be set to 4 or 5 for select to work
  put userLevel into tempUserLevel
  set userLevel to 5
  select line lineClicked of card field "list Index"
  put tempUserLevel into userLevel
  if the selection is empty
  then
  exit mouseUp
end if
put the selection into listSelected
end mouseUp


-- part 3 (field)
-- low flags: 00
-- high flags: 0002
-- rect: left=0 top=23 right=56 bottom=512
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 4
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Headings


-- part 5 (field)
-- low flags: 00
-- high flags: 0002
-- rect: left=0 top=55 right=89 bottom=512
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 4
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: List
----- HyperTalk script -----
on mouseUp
  global listSelected, lineClicked
  put clickLine() into lineClicked
  -- determine how many lines are hidden above
  put (the scroll of me / textHeight of me) into linesAbove
  -- add that number to the relative position clicked
  add linesAbove to lineClicked
  -- userLevel must be set to 4 or 5 for select to work
  put userLevel into tempUserLevel
  set userLevel to 5
  select line lineClicked of card field "list Index"
  put tempUserLevel into userLevel
  if the selection is empty
  then
  exit mouseUp
end if
put the selection into listSelected
end mouseUp


-- part contents for card part 1
----- text -----
LIST NAME:Print Testing

-- part contents for card part 3
----- text -----
  #  | Description
     | File Name

-- part contents for card part 5
----- text -----
 13. | none
     | DispPICT window